home *** CD-ROM | disk | FTP | other *** search
/ Magnum One / Magnum One (Mid-American Digital) (Disc Manufacturing).iso / d15 / maximo_1.arc / TXT.ARC / OVERVIEW.TXT < prev    next >
Encoding:
Text File  |  1991-08-20  |  1.2 KB  |  70 lines
  1. ;
  2. ;  OVERVIEW.TXT -- subr to put corporate overview
  3. ;            (c) Copyright 1990 Chris Butler
  4.  
  5. ;video m
  6.  
  7. set allpsdi off
  8. goto top
  9. all:
  10. set allpsdi on
  11. top: 
  12.  
  13.  
  14. setrgb 0 50 50 50 1        ; lighten mainmenu before wipe
  15. setrgb 15 54 54 54 1
  16. setrgb 3 40 40 40
  17.  
  18. setrgb 2 54 54 54 1
  19. setrgb 3 10 10 10 1
  20. setrgb 4 50 50 50 1
  21.  
  22. pnewbuf 1    ; wipe to clear gray screen
  23. psetbuf 1    ;    
  24. color 4
  25. clearscr
  26. psetbuf
  27. pfade 10 1 300
  28. waitkey 100
  29.  
  30. pnewbuf 1    ; tile into buffer 1st
  31. psetbuf 1    ; (obviates 110KB file!)    
  32. color 4
  33. clearscr
  34. cload psdi25e.clp 1 0 0
  35. tile 1 0
  36. psetbuf
  37. pfade 20 1    ; sparkle in tiled bgrnd
  38. pfree 1
  39.  
  40. cload ovrvuln1.clp 1 1 0  ; each bullet line
  41. cload ovrvuln2.clp 2 1 0
  42. cload ovrvuln3.clp 3 1 0
  43. cload ovrvuln4.clp 4 1 0
  44. cload ovrvuln5.clp 5 1 0
  45. cload ovrvuln6.clp 6 1 0
  46. cload ovrvuln7.clp 7 1 0
  47.  
  48. waitkey 100
  49. cfade 13  56 425 1 40 150
  50. cfade 1  56 345 2 100 150
  51. cfade 1  56 260 3 100 150
  52. cfade 1  56 185 4 100 150
  53. cfade 1  56 100 5 100  0
  54. cfade 1  56  50 6 100  0 
  55. cfade 1  56  15 7 100  0
  56. cfree 1 2 3 4 5 6 7
  57. note 100 10 10
  58.  
  59. waitkey 500
  60.  
  61.  
  62. ; CONTINUE BUTTON !!
  63.  
  64. if @allpsdi==on linkit
  65. link master.txt entry_2
  66. linkit:
  67. link ibmbp.txt all
  68.  
  69. exit
  70.